object ToolbarConfigDlg: TToolbarConfigDlg Left = 338 Top = 244 BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp] BorderStyle = bsDialog Caption = 'Param'#233'trer les barres d'#39'outils' ClientHeight = 341 ClientWidth = 457 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = False Position = poOwnerFormCenter ShowHint = True OnClose = FormClose OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label3: TLabel Left = 16 Top = 16 Width = 72 Height = 13 Caption = 'S'#233'lectionner la &barre d'#39'outils :' FocusControl = ToolbarList end object Image1: TImage Left = 8 Top = 304 Width = 92 Height = 18 AutoSize = True Picture.Data = {} Visible = False end object OKBtn: TButton Left = 216 Top = 312 Width = 73 Height = 23 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 3 OnClick = OKBtnClick end object CancelBtn: TButton Left = 296 Top = 312 Width = 73 Height = 23 Cancel = True Caption = 'Annuler' ModalResult = 2 TabOrder = 4 end object ToolbarList: TListBox Left = 16 Top = 32 Width = 137 Height = 97 HelpContext = 15001 ItemHeight = 13 TabOrder = 0 OnClick = ToolbarListClick end object ApplyBtn: TButton Left = 376 Top = 312 Width = 73 Height = 23 HelpContext = 3 Caption = '&Appliquer' TabOrder = 5 OnClick = ApplyBtnClick end object GroupBox1: TGroupBox Left = 168 Top = 16 Width = 281 Height = 281 Caption = 'Configurer les boutons visibles' TabOrder = 2 object ButtonList: TCheckListBox Left = 16 Top = 16 Width = 249 Height = 217 HelpContext = 15002 OnClickCheck = ButtonListClickCheck ItemHeight = 24 Style = lbOwnerDrawFixed TabOrder = 0 OnDrawItem = ButtonListDrawItem end object BigButtonsEdit: TBCCheckBox Left = 16 Top = 240 Width = 163 Height = 17 HelpContext = 15003 Caption = 'Grands boutons avec texte' TabOrder = 1 OnClick = BigButtonsEditClick end object ClassicIcons: TBCCheckBox Left = 16 Top = 258 Width = 138 Height = 17 HelpContext = 15004 Caption = 'Ic'#244'nes de filtre de style "Classique"' TabOrder = 2 OnClick = ClassicIconsClick end end object LockPosition: TRadioGroup Left = 16 Top = 152 Width = 137 Height = 57 HelpContext = 15010 Caption = 'Position de la barre d'#39'outils' Items.Strings = ( 'D'#233'pla'#231'able' 'Verrouill'#233'e') TabOrder = 1 OnClick = LockPositionClick end end